<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><title>R: Family Medical Expenses</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" href="R.css" />
</head><body>

<table width="100%" summary="page for medExpenses"><tr><td>medExpenses</td><td style="text-align: right;">R Documentation</td></tr></table>

<h2>Family Medical Expenses</h2>

<h3>Description</h3>

<p>The <code>medExpenses</code> data frame  
contains average weekly medical expenses including drugs for 33 families
randomly sampled from a community of 600 families which contained
2700 individuals.  These data were collected in the 1970's at an 
unknown location.
</p>


<h3>Usage</h3>

<pre>medExpenses</pre>


<h3>Format</h3>


<dl>
<dt>familysize</dt><dd><p>number of individuals in a family</p>
</dd>
<dt>expenses</dt><dd><p>average weekly cost for medical expenses per
family member</p>
</dd>
</dl>



<h3>Examples</h3>

<pre>
with(medExpenses, weighted.mean(expenses, familysize))
</pre>


</body></html>
